home *** CD-ROM | disk | FTP | other *** search
/ Risc World 3 / Risc World 3.iso / SOFTWARE / ISSUE4 / ZAP / !Zap / Modules / !ZapJRF / Scripts / test2 < prev    next >
Text File  |  2002-05-08  |  347b  |  29 lines
  1. #Test
  2. #IfModeN Asm,Text
  3.  INSERT "Asm mode"
  4. #Else
  5.  CUP
  6.  #IfText "Hello"
  7.   UNIVERSALARG "5"
  8.   RIGHT
  9.   #IfText " there"
  10.    CRIGHT
  11.    INSERT " Justin"
  12.   #Else
  13.    INSERT " there"
  14.   #EndIf
  15.   CRIGHT
  16.   DOWN
  17.   CLEFT
  18.  #Else
  19.   INSERT "Hello"
  20.   RETURN
  21.  #EndIf
  22.  #IfMode 8,0
  23.   INSERT "In mode 8 or 0"
  24.  #Else
  25.   INSERT "Not in mode 8 or 0"
  26.  #EndIf
  27.  RETURN
  28. #EndIf
  29.